﻿Public Class GestionPartidos

    Private bd As BaseDatos
    Private _idEquipo1 As Integer
    Private _idEquipo2 As Integer
    Private _NombreEquipo1 As String
    Private _NombreEquipo2 As String
    Private _idPartido As Integer

    Private Sub GestionPartidos_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        bd = New BaseDatos
        CargarDatos()
    End Sub

    Public Sub CargarDatos()
        DataGridView1.Rows.Clear()
        Dim listaTorneos As List(Of String)
        listaTorneos = bd.Consultar("Select * from Partidos where IdTorneo = " & FormEntrada.CampeonatoActivo & ";", "Partidos")

        Dim linea1 As String = ""
        Dim linea2 As String = ""
        Dim linea3 As String = ""
        Dim datos() As String

        For i As Integer = 0 To listaTorneos.Count - 1 Step 2
            linea1 = listaTorneos(i)
            For j As Integer = i + 1 To i + 1 Step 1
                linea2 = (listaTorneos(j))
                linea3 = linea1 & "&" & linea2
                datos = Split(linea3, "&")
                DataGridView1.Rows.Add(datos(0), datos(1), datos(2), datos(8), ObtenerNombre(datos(2)), ObtenerNombre(datos(8)), _
                                       datos(3) & "-" & datos(9), datos(4) & "-" & datos(10), datos(5) & "-" & datos(11))
            Next

        Next
    End Sub

    Public Function ObtenerNombre(ByVal idEquipo As String) As String
        Dim salida() As String
        Dim listaNombres As List(Of String)
        listaNombres = bd.Consultar("Select * from Equipos where id = " & idEquipo & ";", "Equipos")
        salida = Split(listaNombres(0), "-")
        Return salida(0)
    End Function

    Private Sub DataGridView1_CellDoubleClick_1(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellDoubleClick
        _idEquipo1 = CInt(DataGridView1((2), DataGridView1.CurrentRow.Index).Value)
        _idEquipo2 = CInt(DataGridView1((3), DataGridView1.CurrentRow.Index).Value)
        _NombreEquipo1 = CStr(DataGridView1((4), DataGridView1.CurrentRow.Index).Value)
        _NombreEquipo2 = CStr(DataGridView1((5), DataGridView1.CurrentRow.Index).Value)
        _idPartido = CInt(DataGridView1((0), DataGridView1.CurrentRow.Index).Value)
        'MsgBox(_idPartido & "-" & _idEquipo1 & "-" & _NombreEquipo1 & "-" & _NombreEquipo2 & "-" & _idEquipo2)
        InsertarResultados.Show()
    End Sub

    Public Property GIdEquipo1() As Integer
        Get
            Return _idEquipo1
        End Get
        Set(ByVal value As Integer)
            _idEquipo1 = value
        End Set
    End Property

    Public Property GIdEquipo2() As Integer
        Get
            Return _idEquipo2
        End Get
        Set(ByVal value As Integer)
            _idEquipo2 = value
        End Set
    End Property

    Public Property GIdPartido() As Integer
        Get
            Return _idPartido
        End Get
        Set(ByVal value As Integer)
            _idPartido = value
        End Set
    End Property

    Public Property GNombreEquipo1() As String
        Get
            Return _NombreEquipo1
        End Get
        Set(ByVal value As String)
            _NombreEquipo1 = value
        End Set
    End Property

    Public Property GNombreEquipo2() As String
        Get
            Return _NombreEquipo2
        End Get
        Set(ByVal value As String)
            _NombreEquipo2 = value
        End Set
    End Property

    
End Class